00100	COMPILE;
00200	INSTRUMENT FM1;
00300	OSCIL(P4,MAG/P2,P5);
00400	OSCIL((P8-P7)*P6*MAG,MAG/P2,P11);
00500	OSCIL(U2+P7*P6*MAG,P6*MAG,P10);
00600	ZOSCIL(U1,U3+P3*MAG,P9);
00700	OUTA←OUTA+U4;
00800	END;
00900	
01000	FINISH;
01100	
01200	ARRAY F5(512);
01300	SEG(F5); 1,1 .5,25 .25,50 .1,75 0,100;
01400	ARRAY F3,F4(512);
01500	SEG(F4); 1,1 0,12 0,100;
01600	SEG(F3); .8,1 1,25 .25,50 0,100;
01700	SYNTH(F1);1 1 999;